﻿Public Class KiracıBul

    Private Sub FirmalarBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Validate()
        Me.FirmalarBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.KiracıLookUpDataSet)

    End Sub

    Private Sub KiracıBul_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'KiracıLookUpDataSet.Firmalar' table. You can move, or remove it, as needed.
        Me.FirmalarTableAdapter.Fill(Me.KiracıLookUpDataSet.Firmalar)
        'TODO: This line of code loads data into the 'KiracıLookUpDataSet.Firmalar' table. You can move, or remove it, as needed.
        Me.FirmalarTableAdapter.Fill(Me.KiracıLookUpDataSet.Firmalar)

    End Sub

    Private Sub FirmalarBindingNavigatorSaveItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FirmalarBindingNavigatorSaveItem.Click
        Me.Validate()
        Me.FirmalarBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.KiracıLookUpDataSet)

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        SozlesmeGiris.Show()
        SozlesmeGiris.SozlesmeDetayTableAdapter.FillByKiracıID(SozlesmeGiris.SozlesmeGirisDataSet.SozlesmeDetay, KiracıFirmaID:=Me.FirmaIDTextBox.Text)
        Me.Close()
        'BU SALAK FORM ile ilgili sorunlar var anlamış değilim 3-5 iyi çalışıyor sonra sapıtıyor'
    End Sub
End Class